|
42
|
Is it possible to programmatically expand a folder (sample 1)
With Excascadefile1
.BeginUpdate()
.Layout = "Expand0 = ""c:\"";SelectMode0 = 0"
.EndUpdate()
End With
|
|
41
|
Can I limit the size of each cascade column, so the user can't resize them outside of the range I give
With Excascadefile1
.BeginUpdate()
.HeaderVisible = False
.Mode = exontrol.EXMILLERLib.CascadeModeEnum.exFixCascadeMode
.ColumnsVisible = exontrol.EXMILLERLib.FileColumnEnum.exFileColumnName
.MinColumnWidth = 128
.MaxColumnWidth = 256
.EndUpdate()
End With
|
|
40
|
How can I define the width of the cascade column
With Excascadefile1
.BeginUpdate()
.Mode = exontrol.EXMILLERLib.CascadeModeEnum.exFixCascadeMode
.DefColumnWidth = 256
.EndUpdate()
End With
|
|
39
|
The scroll bars are too large. Can I make them smaller
With Excascadefile1
.BeginUpdate()
.ScrollWidth = 4
.ScrollHeight = 4
.EndUpdate()
End With
|
|
38
|
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area
With Excascadefile1
.BeginUpdate()
.set_ScrollPartVisible(exontrol.EXMILLERLib.ScrollBarEnum.exVScroll,exontrol.EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True)
.set_ScrollPartVisible(exontrol.EXMILLERLib.ScrollBarEnum.exHScroll,exontrol.EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True)
.set_ScrollPartVisible(exontrol.EXMILLERLib.ScrollBarEnum.exScroll,exontrol.EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True)
.ScrollWidth = 4
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exVSBack,Color.FromArgb(240,240,240))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exVSThumb,Color.FromArgb(128,128,128))
.ScrollHeight = 4
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exHSBack,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exVSBack))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exHSThumb,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exVSThumb))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exScrollSizeGrip,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exVSBack))
.EndUpdate()
.BeginUpdate()
.ColumnsVisible = exontrol.EXMILLERLib.FileColumnEnum.exFileColumnName
.HeaderVisible = False
.FitCascadeColumns = 3
.EndUpdate()
End With
|
|
37
|
How can I lock / freeze the control events
' Event event - Notifies the application once the control fires an event.
Private Sub Excascadefile1_Event(ByVal sender As System.Object,ByVal EventID As Integer) Handles Excascadefile1.Event
With Excascadefile1
Debug.Print( .get_EventParam(-2) )
End With
End Sub
With Excascadefile1
.FreezeEvents(True)
End With
|
|
36
|
How can I display the list mode in the first view, and thumbnail in the second view
With Excascadefile1
.BeginUpdate()
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowOneSplitView
.SplitViewHeight = "256"
.Layout = "Select1=""c:\"";SelectMode1 = 2"
.Layout = "Select0=""c:\"";SelectMode0 = 1"
.EndUpdate()
End With
|
|
35
|
How can I programmatically select a different folder in the second, or third view
With Excascadefile1
.BeginUpdate()
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowOneSplitView
.SplitViewHeight = "256"
.Layout = "Select1=""d:\"""
.Layout = "Select0=""E:\"""
.EndUpdate()
End With
|
|
34
|
How can I programmatically vertically-split the control
With Excascadefile1
.BeginUpdate()
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView
.SplitViewHeight = "256,256"
.EndUpdate()
End With
|
|
33
|
How can I find if the control is running in DPI mode
With Excascadefile1
Debug.Print( .FormatABC("dpi = 1 ? `normal/stretch mode` : `dpi mode`") )
End With
|
|
32
|
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme
With Excascadefile1
.BeginUpdate()
With .VisualAppearance
.Add(1,"XP:TREEVIEW 2 1")
.Add(2,"XP:TREEVIEW 2 2")
End With
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exTreeGlyphOpen,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exTreeGlyphClose,&H2000000)
.EndUpdate()
End With
|
|
31
|
How can I change the visual appearance of the +/- buttons
With Excascadefile1
.BeginUpdate()
With .VisualAppearance
.Add(1,"gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" & _
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" & _
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" & _
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5Jlg" & _
"XIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIR" & _
"gwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOM" & _
"INCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=")
.Add(2,"gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" & _
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" & _
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" & _
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCE" & _
"eBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchO" & _
"FSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQO" & _
"JtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=")
End With
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exTreeGlyphOpen,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exTreeGlyphClose,&H2000000)
.EndUpdate()
End With
|
|
30
|
How can I change the color for selected thumbnail
With Excascadefile1
.BeginUpdate()
.Select = "c:\"
.SelectMode = exontrol.EXMILLERLib.SelectModeEnum.exSelectModeThumbnail
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exThumbnailSelBorderColor,Color.FromArgb(255,0,0))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exThumbnailSelBorderColorHide,Color.FromArgb(128,0,0))
.EndUpdate()
End With
|
|
29
|
How can I change the thumbnail's frame color
With Excascadefile1
.BeginUpdate()
.Select = "c:\"
.SelectMode = exontrol.EXMILLERLib.SelectModeEnum.exSelectModeThumbnail
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exThumbnailBorderColor,Color.FromArgb(0,0,1))
.EndUpdate()
End With
|
|
28
|
Turn on the background-alternate colors, for Thumbnail view
With Excascadefile1
.BeginUpdate()
.Select = "c:\"
.SelectMode = exontrol.EXMILLERLib.SelectModeEnum.exSelectModeThumbnail
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exThumbnailBackColorAlt,Color.FromArgb(128,128,128))
.EndUpdate()
End With
|
|
27
|
Is there any option I can highlight the panel view that currently has the focus
With Excascadefile1
.BeginUpdate()
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exFocusFrame,Color.FromArgb(128,128,128))
.EndUpdate()
End With
|
|
26
|
I disabled the split bars, the question is how can I change the visual appearance of them
With Excascadefile1
.BeginUpdate()
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,Color.FromArgb(128,128,128))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exDisableSplitBar,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exCSplitBar,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exHSplitBar,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBarSize,Color.FromArgb(2,0,0))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exDisableSplitBarSize,.get_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBarSize))
.HeaderVisible = False
.Mode = exontrol.EXMILLERLib.CascadeModeEnum.exAutoFitOnResizeClient Or exontrol.EXMILLERLib.CascadeModeEnum.exDisableResizeCascadeColumns Or exontrol.EXMILLERLib.CascadeModeEnum.exSplitFixCascadeMode
.EndUpdate()
End With
|
|
25
|
The control's split bar looks a bit larger, can I make it smaller
With Excascadefile1
.BeginUpdate()
.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _
"AceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69" & _
"JbwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFo" & _
"iC8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFY" & _
"FoFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJl" & _
"EkRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDyd" & _
"w8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi" & _
"0CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI")
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exCSplitBar,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exHSplitBar,&H1000000)
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBarSize,Color.FromArgb(3,0,0))
.HeaderVisible = False
.EndUpdate()
End With
|
|
24
|
How can I change the status bar's visual appearance
With Excascadefile1
.BeginUpdate()
.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _
"AceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69" & _
"JbwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFo" & _
"iC8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFY" & _
"FoFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJl" & _
"EkRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDyd" & _
"w8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi" & _
"0CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI")
.StatusBarVisible = exontrol.EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusBackColor,&H1404040)
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusForeColor,Color.FromArgb(255,255,255))
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusPanelBackColor,&H1808080)
.EndUpdate()
End With
|
|
23
|
How can I change the status bar's visual appearance
With Excascadefile1
.BeginUpdate()
.StatusBarVisible = exontrol.EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusBackColor,Color.FromArgb(40,40,40))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusForeColor,Color.FromArgb(255,255,255))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exStatusPanelBackColor,Color.FromArgb(128,128,128))
.EndUpdate()
End With
|
|
22
|
How can I change the visual appearance for all split-bars that the control displays
With Excascadefile1
.BeginUpdate()
.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _
"AceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69" & _
"JbwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFo" & _
"iC8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFY" & _
"FoFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJl" & _
"EkRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDyd" & _
"w8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi" & _
"0CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI")
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exCSplitBar,&H1000000)
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exHSplitBar,&H1000000)
.HeaderVisible = False
.EndUpdate()
End With
|
|
21
|
How can I change the visual appearance for all split-bars that the control displays
With Excascadefile1
.BeginUpdate()
.AllowSplitView = exontrol.EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,Color.FromArgb(0,0,1))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exCSplitBar,Color.FromArgb(0,0,1))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exHSplitBar,Color.FromArgb(0,0,1))
.HeaderVisible = False
.EndUpdate()
End With
|
|
20
|
How can I change the tooltip's visual appearance
' MouseMove event - Occurs when the user moves the mouse.
Private Sub Excascadefile1_MouseMoveEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles Excascadefile1.MouseMoveEvent
With Excascadefile1
.ShowToolTip("This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.")
End With
End Sub
With Excascadefile1
.BeginUpdate()
.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABEgDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIHQSDSEYyjGLIXAWCYSAAMIyDKAUEhyGCUBileQhVgyJI3RgMUIzV" & _
"AcRRFEiUJQlIZZCgeCZETrPcaUVDcTQHJyRYDlWA3NBwJAAVTVcT0FJdCxEGiRBiqOZ5CAqHIeU7IMI2HTNMStDCYRpEW4bTocMJ1QKNNzyRIkRShC6zLRnDAwApyLIu" & _
"TBOcx0Pb+CQ5HgAMgnbA6Bg2XYNTRYNKRRjYKwTKCQJ5tOCbNq2W6WUhBFb2DYdewTQIAM6gO0cQyiAC2Lb0aR5brKdIoXpeAAcDblF4/BLZAA2DZsOhzBpjYreNBRBh" & _
"uC+G4oFQOQ8liXw/BEX5pg4dY8GgHpCiGNJtHadJwDGFp7HuQpiF2OBRHsHZ7g+ZJkHofB7HARAkiAaQYkcQZUHIGRUGQDIuE2BAhDYBxGkMZAkCgRxRnWKAYEYB4Elm" & _
"aQJAGQ42BgOxPCgdJMgeS7/CKCJiEiCJDgmThYiSfoKmGNAOBsOYjAMEgyDcYxDi4NoNmOCJmDoMhjkMYg+D8ZAEAyd4QkwWQUmqEZOmkJhKhKZJJDYSg8mUAwiFIOZl" & _
"EQDJVhWTR5GSb4WmSaR2F6FpOniJJlDGJhEA4MgxA4OYknGGpPAmNhuhulRGHKGxLjmVQDC+J4DiYeg8GGWYuH6H5oAoBoCgcTwimaBodmeGZongPRPCoCoOiOZ5qBII" & _
"oiAuaZomkPoPGOToEiaaZKHaHYfiUA5OhMAAngoVh6iYKYqHqKoqmGWoGiOKRkHOKJ7D2TxKgaNotmuCpmFAPQrkqPh4iwaw6laOowmwOpwnSL4LmiXJ9D4TxbBqTozm" & _
"0CxGjwPRtEsIJsjWT4Dlydo1C2Sx2l6N5uAOWpijIDpbhYQ42i4K4mmqOpukuMpnjIJIjmKco5m8S5WnaPZkDuSJ4h0S46FKcY8m+DAHAGPovkoUhgD4cILmsCpCnCTA" & _
"2nKQgPhwFokh4JpjmsFpEDGDBnBqRpwgwWJ6kSKhZjie5FnGTIXCWR4yAmYh+D+D48g8HpLnMDJHDIPoylObwpWIY5/CyTJzkydw1kSIhzA6ZQ7E+fJrDWUZ0g0JxKks" & _
"T5NDSPJTmUaRcmAN5Nn0FJ/lMdYNGcWpWnWHRaGAMZ2AQDoEDKNhLicVpViQDYnGqWpPl2HxFDQNwJgoLoGGaCcDInRdjMCuNYbovR2D2FyNgNIcAJC5FWKwNwcBqAzC" & _
"WBoPgTA8BkEwFwN4HRjjyAMH8EgcQ5CaGIFoAAHQ3AoAAIAQBAQ==")
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exToolTipAppearance,&H1000000)
.EndUpdate()
End With
|
|
19
|
How can I change the tooltip's visual appearance
' MouseMove event - Occurs when the user moves the mouse.
Private Sub Excascadefile1_MouseMoveEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles Excascadefile1.MouseMoveEvent
With Excascadefile1
.ShowToolTip("This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.")
End With
End Sub
With Excascadefile1
.BeginUpdate()
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exToolTipBackColor,Color.FromArgb(0,0,1))
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exToolTipForeColor,Color.FromArgb(255,255,0))
.EndUpdate()
End With
|
|
18
|
How can I change the visual appearance of the control's split bar
With Excascadefile1
.BeginUpdate()
.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABEgDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIHQSDSEYyjGLIXAWCYSAAMIyDKAUEhyGCUBileQhVgyJI3RgMUIzV" & _
"AcRRFEiUJQlIZZCgeCZETrPcaUVDcTQHJyRYDlWA3NBwJAAVTVcT0FJdCxEGiRBiqOZ5CAqHIeU7IMI2HTNMStDCYRpEW4bTocMJ1QKNNzyRIkRShC6zLRnDAwApyLIu" & _
"TBOcx0Pb+CQ5HgAMgnbA6Bg2XYNTRYNKRRjYKwTKCQJ5tOCbNq2W6WUhBFb2DYdewTQIAM6gO0cQyiAC2Lb0aR5brKdIoXpeAAcDblF4/BLZAA2DZsOhzBpjYreNBRBh" & _
"uC+G4oFQOQ8liXw/BEX5pg4dY8GgHpCiGNJtHadJwDGFp7HuQpiF2OBRHsHZ7g+ZJkHofB7HARAkiAaQYkcQZUHIGRUGQDIuE2BAhDYBxGkMZAkCgRxRnWKAYEYB4Elm" & _
"aQJAGQ42BgOxPCgdJMgeS7/CKCJiEiCJDgmThYiSfoKmGNAOBsOYjAMEgyDcYxDi4NoNmOCJmDoMhjkMYg+D8ZAEAyd4QkwWQUmqEZOmkJhKhKZJJDYSg8mUAwiFIOZl" & _
"EQDJVhWTR5GSb4WmSaR2F6FpOniJJlDGJhEA4MgxA4OYknGGpPAmNhuhulRGHKGxLjmVQDC+J4DiYeg8GGWYuH6H5oAoBoCgcTwimaBodmeGZongPRPCoCoOiOZ5qBII" & _
"oiAuaZomkPoPGOToEiaaZKHaHYfiUA5OhMAAngoVh6iYKYqHqKoqmGWoGiOKRkHOKJ7D2TxKgaNotmuCpmFAPQrkqPh4iwaw6laOowmwOpwnSL4LmiXJ9D4TxbBqTozm" & _
"0CxGjwPRtEsIJsjWT4Dlydo1C2Sx2l6N5uAOWpijIDpbhYQ42i4K4mmqOpukuMpnjIJIjmKco5m8S5WnaPZkDuSJ4h0S46FKcY8m+DAHAGPovkoUhgD4cILmsCpCnCTA" & _
"2nKQgPhwFokh4JpjmsFpEDGDBnBqRpwgwWJ6kSKhZjie5FnGTIXCWR4yAmYh+D+D48g8HpLnMDJHDIPoylObwpWIY5/CyTJzkydw1kSIhzA6ZQ7E+fJrDWUZ0g0JxKks" & _
"T5NDSPJTmUaRcmAN5Nn0FJ/lMdYNGcWpWnWHRaGAMZ2AQDoEDKNhLicVpViQDYnGqWpPl2HxFDQNwJgoLoGGaCcDInRdjMCuNYbovR2D2FyNgNIcAJC5FWKwNwcBqAzC" & _
"WBoPgTA8BkEwFwN4HRjjyAMH8EgcQ5CaGIFoAAHQ3AoAAIAQBAQ==")
.set_Background32(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,&H1000000)
.HeaderVisible = False
.Mode = exontrol.EXMILLERLib.CascadeModeEnum.exFixCascadeMode
.EndUpdate()
End With
|
|
17
|
How can I change the visual appearance of the control's split bar
With Excascadefile1
.BeginUpdate()
.set_Background(exontrol.EXMILLERLib.BackgroundPartEnum.exSplitBar,Color.FromArgb(240,240,240))
.HeaderVisible = False
.Mode = exontrol.EXMILLERLib.CascadeModeEnum.exFixCascadeMode
.EndUpdate()
End With
|
|
16
|
How can I load images into the control
With Excascadefile1
.set_HTMLPicture("pic1","c:\exontrol\images\zipdisk.gif")
.StatusBarVisible = exontrol.EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop
.StatusBarLabel = "<img>pic1</img> This is picture into the control's status bar"
End With
|
|
15
|
Is it possible to show my tooltip
' MouseMove event - Occurs when the user moves the mouse.
Private Sub Excascadefile1_MouseMoveEvent(ByVal sender As System.Object,ByVal Button As Short,ByVal Shift As Short,ByVal X As Integer,ByVal Y As Integer) Handles Excascadefile1.MouseMoveEvent
With Excascadefile1
.ShowToolTip("This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.")
End With
End Sub
|
|
14
|
Is it possible to change the tooltip's font
Dim f
With Excascadefile1
f = New stdole.StdFont()
With f
.Name = "Tahoma"
.Size = 12
End With
.ToolTipFont = f
End With
|
|
13
|
Is it possible to change the tooltip's width
With Excascadefile1
.ToolTipWidth = 64
End With
|
|
12
|
How can I disable the control
With Excascadefile1
.Enabled = False
End With
|
|
11
|
How can I force refreshing the control
With Excascadefile1
.BeginUpdate()
.Refresh()
.EndUpdate()
End With
|
|
10
|
How can I prevent showing any tooltip
With Excascadefile1
.ToolTipDelay = 0
.ToolTipPopDelay = 0
End With
|
|
9
|
How can I make the control's tooltip to be shown for a longer time
With Excascadefile1
.ToolTipPopDelay = 10000
End With
|
|
8
|
How can I make the control's tooltip to be shown faster
With Excascadefile1
.ToolTipDelay = 1
End With
|
|
7
|
How can I get the control's handle
With Excascadefile1
Debug.Print( .hWnd )
End With
|
|
6
|
How can I clears the images into the control
With Excascadefile1
.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
.StatusBarVisible = exontrol.EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop
.StatusBarLabel = "<img>1</img> This is an icon into the control's status bar"
.ReplaceIcon(0,-1)
End With
|
|
5
|
How can I load images into the control
With Excascadefile1
.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
.StatusBarVisible = exontrol.EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop
.StatusBarLabel = "<img>1</img> This is an icon into the control's status bar"
End With
|
|
4
|
How do I get the version of the control I am running
With Excascadefile1
Debug.Print( .Version )
End With
|
|
3
|
The control's foreground is changed if I open multiple views. What can be the problem
With Excascadefile1
.ForeColor = Color.FromArgb(255,0,0)
.ForeColorAlternate = .ForeColor
End With
|
|
2
|
The control's background is changed if I open multiple views. What can be the problem
With Excascadefile1
.BackColor = Color.FromArgb(255,255,0)
.BackColorAlternate = .BackColor
End With
|
|
1
|
How do I change the control's background color
With Excascadefile1
.BackColor = Color.FromArgb(240,240,240)
.BackColorAlternate = .BackColor
.HeaderVisible = False
End With
|